home *** CD-ROM | disk | FTP | other *** search
/ Let's Discover Texas! / Let's Discover Texas!.iso / pc / FILES / FUND.dxr / 00001_Fund Movie Script.ls next >
Encoding:
Text File  |  2001-01-04  |  1.1 KB  |  49 lines
  1. global greenNum, yellowNum, redNum, purpleNum, homeNum, catName
  2.  
  3. on startMovie
  4.   greenNum = 71
  5.   purpleNum = 72
  6.   redNum = 73
  7.   yellowNum = 74
  8.   homeNum = 75
  9.   catName = "FUND"
  10.   sound(1).volume = 255
  11.   sound(2).volume = 255
  12.   sound(3).volume = 255
  13.   sound(4).volume = 255
  14.   sound(5).volume = 255
  15. end
  16.  
  17. on stopMovie
  18.   sound(1).stop()
  19.   sound(2).stop()
  20.   sound(3).stop()
  21.   sound(4).stop()
  22.   sound(5).stop()
  23. end
  24.  
  25. on setMasterVolume masterLevel
  26.   set the soundLevel to masterLevel
  27. end
  28.  
  29. on backToFrame
  30.   global helpRetFrame, yellowStatus, greenStatus, purpleStatus, redStatus, yellowNum, greenNum, purpleNum, redNum
  31.   go(helpRetFrame)
  32.   if greenStatus = 1 then
  33.     sprite(greenNum).member = member("BttGreenDone")
  34.   end if
  35.   if purpleStatus = 1 then
  36.     sprite(purpleNum).member = member("BttPurpleDone")
  37.   end if
  38.   if redStatus = 1 then
  39.     sprite(redNum).member = member("BttRedDone")
  40.   end if
  41.   sprite(yellowNum).member = member("BttYellowDown")
  42.   if (helpRetFrame > 30) and (helpRetFrame < 3600) then
  43.     puppetSound(4, "IconMachine")
  44.   end if
  45.   if (helpRetFrame > 385) and (helpRetFrame < 402) then
  46.     puppetSound(5, "Pickin")
  47.   end if
  48. end
  49.